BCI NET 2/BCI NET 2.iso/archives/programming/c/amivogl-1.03.lzh/vogl/src/text.c

C/C++ Source or Header | 1994-04-12 | 5.1 KB | 296 lines

#include <stdio.h>

#if defined(PC) || defined(AZTEC_C)
#include <string.h>
#else
#include <strings.h>
#endif
#include "vogl.h"

/* ---------------------------------------------------------------------
 * Local Variables:
 */
static    float    c_x, c_y, c_z;    /* Current character position */

/* ---------------------------------------------------------------------
 * Prototypes:
 */
#ifdef __PROTOTYPE__
static float getcharwidth(void);                       /* text.c          */
#else    /* __PROTOTYPE__ */
static float getcharwidth();                           /* text.c          */
#endif    /* __PROTOTYPE__ */

/* ---------------------------------------------------------------------
 * Source Code:
 */

/*
 * font
 *     assigns a font.
 */
void font(short id)
{
Token    *tok;

if (!vdevice.initialised)
verror("font: vogl not initialised");

if (id < 0 || id >= vdevice.maxfontnum)
verror("font: font number is out of range");

if (vdevice.inobject) {
    tok = newtokens(2);
    tok[0].i = FONT;
    tok[1].i = id;
    return;
    }

if (id == 1) {
    if (!(*vdevice.dev.Vfont)(vdevice.dev.large))
    verror("font: unable to open large font");
    }
else if (id == 0) {
    if (!(*vdevice.dev.Vfont)(vdevice.dev.small))
    verror("font: unable to open small font");
    }

vdevice.attr->a.fontnum = id;
}

/* ------------------------------------------------------------------------ */

/*
 * getcharwidth
 *
 *     Gets the width of one char on world coords.
 */
static float getcharwidth(void)
{
float           a, b, c, d;

VtoWxy(vdevice.hwidth, vdevice.hheight, &c, &d);
VtoWxy(0.0, 0.0, &a, &b);
c -= a;
return(c);
}

/* ------------------------------------------------------------------------ */

/*
 * charstr
 *
 * Draw a string from the current character position.
 *
 */
void charstr(char *str)
{
float    cx, cy, cz;
char    c;
Token    *tok;
int    oldclipoff = vdevice.clipoff;
int    sl = strlen(str);

if(!vdevice.initialised)
verror("charstr: vogl not initialized");

if (vdevice.inobject) {
    tok = newtokens(2 + strlen(str) / sizeof(Token));

    tok[0].i = DRAWSTR;
    strcpy((char *)&tok[1], str);

    return;
    }

cx = vdevice.cpW[V_X];
cy = vdevice.cpW[V_Y];
cz = vdevice.cpW[V_Z];

vdevice.clipoff = 1;    /* Forces update of device coords */
move(c_x, c_y, c_z);    /* Updates device coords      */

/*   If not clipping then simply display text and return  */

if (oldclipoff) {
    (*vdevice.dev.Vstring)(str);
    }
else { /* Check if string is within viewport */
    int    left_s = vdevice.cpVx;
    int    bottom_s = vdevice.cpVy - (int)vdevice.hheight;
    int    top_s = bottom_s + (int)vdevice.hheight;
    int    right_s = left_s + (int)((sl + 1) * vdevice.hwidth);

    if (left_s > vdevice.minVx &&
        bottom_s < vdevice.maxVy &&
        top_s > vdevice.minVy &&
        right_s < vdevice.maxVx) {
        (*vdevice.dev.Vstring)(str);
        }
    else {
        while (c = *str++) {
            if (vdevice.cpVx > vdevice.minVx &&
                vdevice.cpVx < vdevice.maxVx - (int)vdevice.hwidth) {
                (*vdevice.dev.Vchar)(c);
                }
            vdevice.cpVx += vdevice.hwidth;
            }
        }
    }

c_x += getcharwidth() * sl;

move(cx, cy, cz);
vdevice.clipoff = oldclipoff;
}

/* ------------------------------------------------------------------------ */

/*
 * cmov
 *
 *    Sets the current character position.
 */
void cmov(
  float x,
  float y,
  float z)
{
Token    *tok;

if (vdevice.inobject) {
    tok = newtokens(4);

    tok[0].i = CMOV;
    tok[1].f = x;
    tok[2].f = y;
    tok[3].f = z;

    return;
    }

c_x = x;
c_y = y;
c_z = z;
}

/* ------------------------------------------------------------------------ */


/*
 * cmov2
 *
 *    Sets the current character position. Ignores the Z coord.
 *
 *
 */
void cmov2(
  float x,
  float y)
{
c_x = x;
c_y = y;
c_z = 0.0;
}

/* ------------------------------------------------------------------------ */

/*
 * cmovi
 *
 *    Same as cmov but with integer arguments....
 */
void cmovi(
  Icoord x,
  Icoord y,
  Icoord z)
{
c_x = (Coord)x;
c_y = (Coord)y;
c_z = (Coord)z;
}

/* ------------------------------------------------------------------------ */

/*
 * cmovs
 *
 *    Same as cmov but with short integer arguments....
 */
void cmovs(
  Scoord x,
  Scoord y,
  Scoord z)
{
c_x = (Coord)x;
c_y = (Coord)y;
c_z = (Coord)z;
}

/* ------------------------------------------------------------------------ */

/*
 * cmov2i
 *
 *    Same as cmov2 but with integer arguments....
 */
void cmov2i(
  Icoord x,
  Icoord y)
{
c_x = (Coord)x;
c_y = (Coord)y;
c_z = 0.0;
}

/* ------------------------------------------------------------------------ */

/*
 * cmov2s
 *
 *    Same as cmov but with short integer arguments....
 */
void cmov2s(
  Scoord x,
  Scoord y)
{
c_x = (Coord)x;
c_y = (Coord)y;
c_z = 0.0;
}

/* ------------------------------------------------------------------------ */

/*
 * getwidth
 *
 * Return the maximum Width of the current font.
 *
 */
long getwidth(void)
{
if (!vdevice.initialised)
verror("getwidth: vogl not initialised");


return((long)vdevice.hwidth);
}

/* ------------------------------------------------------------------------ */

/*
 * getheight
 *
 * Return the maximum Height of the current font
 */
long getheight(void)
{
if (!vdevice.initialised)
verror("getheight: vogl not initialized");

return((long)vdevice.hheight);
}

/* ------------------------------------------------------------------------ */